Bezier Curve 

Function: calc[BezierAnim] - creates an animation of a Bézier curve 

Calling Sequence:  

BezierAnim( p, N, K) 

Parameters: 

p -  list of four points ( two end points and two control points)  

N - number of frames 

K - free variable 

Description: 

  • BezierAnim animates a Bézier curve given by two endpoints and two control points. Typing  K returns the parametric equations x(t) and y(t)
 

Examples: 

> restart: MathMaple:-ini():with(calc):
 

> p:=[[0,0],[-1,2],[3,5],[2,0]]:
 

> BezierAnim(p,35,K);
 

Plot_2d
 

> K;
 

x(t) = `+`(`-`(`*`(3, `*`(t))), `*`(15, `*`(`^`(t, 2))), `-`(`*`(10, `*`(`^`(t, 3))))), y(t) = `+`(`*`(6, `*`(t)), `*`(3, `*`(`^`(t, 2))), `-`(`*`(9, `*`(`^`(t, 3)))))